home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.19950528-19950726 / 000107_news@columbia.edu_Sat Jun 10 15:34:17 1995.msg < prev    next >
Internet Message Format  |  2020-01-01  |  3KB
  1. Received: from apakabar.cc.columbia.edu by watsun.cc.columbia.edu with SMTP id AA27065
  2.   (5.65c+CU/IDA-1.4.4/HLK for <kermit.misc@watsun.cc.columbia.edu>); Sat, 10 Jun 1995 18:12:22 -0400
  3. Received: by apakabar.cc.columbia.edu id AA14517
  4.   (5.65c+CU/IDA-1.4.4/HLK for kermit.misc@watsun); Sat, 10 Jun 1995 18:12:18 -0400
  5. Path: news.columbia.edu!panix!bloom-beacon.mit.edu!news.kei.com!nntp.et.byu.edu!netline-fddi.jpl.nasa.gov!elroy.jpl.nasa.gov!decwrl!tribune.usask.ca!canopus.cc.umanitoba.ca!uwpg02.uwinnipeg.ca!clark
  6. From: clark@uwpg02.uwinnipeg.ca (Jim Clark)
  7. Newsgroups: comp.protocols.kermit.misc
  8. Subject: Problem with ASK in adapting script to ethernet.
  9. Date: 10 JUN 95 15:34:17 GMT
  10. Organization: University of Winnipeg
  11. Lines: 73
  12. Message-Id: <10JUN95.15341792@uwpg02.uwinnipeg.ca>
  13. Nntp-Posting-Host: uwpg02.uwinnipeg.ca
  14. Apparently-To: kermit.misc@watsun.cc.columbia.edu
  15.  
  16. Hi
  17.  
  18.      I am revising a Kermit script that worked fine with a serial line for use
  19. on ethernet network.  The program, shown below, offers menu of choices and then
  20. performs initial login operations.  Problem is that the ASK command used to get
  21. input from user now seems to hang up the program.  Has anyone else had this
  22. problem and found a solution?  I tried various things, including moving the
  23. TAKE that retrieves the internet addresses after the ASK, but nothing seems to
  24. work.  Things seem to work OK if I remark out the problematic line and use
  25. ASSIGN to set the variable (\%v) for the selection.  Any suggestions
  26. appreciated (even if I've overlooked something amazingly simple ... which has
  27. never happened before, of course).
  28.  
  29. Best Wishes
  30. Jim
  31.  
  32. James M. Clark                  CLARK@UWPG02.BITNET  (note ZERO-TWO)
  33. Department of Psychology        CLARK@UWPG02.UWINNIPEG.CA
  34. University of Winnipeg          (204) 786-9313
  35. Winnipeg, Manitoba, Canada      (204) 786-1824 FAX
  36. R3B 2E9
  37.  
  38.  
  39. take c:\net\ipset.ini
  40.  
  41. ; menu
  42.   echo ************************************
  43.   echo B - Bridge (UofM and UofW libraries)
  44.   echo M - Manitoba IBM Mainframe (UofM)
  45.   echo U - Unix (UofW IO)
  46.   echo V - Vax (UofW)
  47.   echo ************************************
  48.   echo
  49.  
  50. ;script hangs up at following ASK
  51. ;input accepted and assigned to variable but then nothing
  52. ;on <Enter>, cursor moves to beginning of input prompt
  53. ;any additional characters typed overtype prompt
  54. ;next return ends up at Kermit prompt
  55. ;everything works OK if ASSIGN used for fixed value of \%v
  56.  
  57.   ask \%v Type letter of choice, then <Enter>?\32
  58.  
  59. ; choose subroutine
  60.   if equal \%v b goto bridge
  61.   if equal \%v m goto uman
  62.   if equal \%v u goto io
  63.   if equal \%v v goto vax
  64.   stop                             ; end script if no match
  65.  
  66. :bridge                            ; Bridge / UofM Library logon
  67.   SET PORT TCP umopac.umanitoba.ca
  68.   connect
  69.   input UML=>
  70.   output set lib uow\13
  71.   goto end
  72.  
  73. :uman                          ; UofM Mainframe logon
  74.   SET PORT TCP ccm.umanitoba.ca
  75.   connect
  76.   goto end
  77.  
  78. :io                           ; IO Unix option
  79.   SET PORT TCP io.uwinnipeg.ca
  80.   connect
  81.   goto end
  82.  
  83. :vax                          ; Vax option
  84.   SET PORT TCP uwpg02.uwinnipeg.ca
  85.   connect
  86.   goto end
  87.  
  88. :end